 /*  SAS Data Definition File                        */
 /*  Created by ddltox on Mar 28, 2002  (Thu 03:33 PM PST)  */
 /*  DDL source file: "/u/d7/big/sda_1.2a/tmpdir/AA7uaqms.txt".  */

/* DDL indicates that dataset record length (reclen) is 112 columns. */

TITLE "ORANGE COUNTY ANNUAL SURVEY";
FILENAME INDATA "    ";      /* Put name of data file between quotes */
LIBNAME LIBRARY "    ";    /* Put directory of data library between quotes */

PROC  FORMAT LIB=LIBRARY;
  VALUE OC1f      1='TOWNHOUSE' 2='SINGLE FAMILY' 3='APARTMENT' 
                  4='MOBIL HOME' 5='OTHER' 9='REFUSE' ;
  VALUE OC2f      1='2 YEARS' 2='3-5 YEARS' 3='6-10 YEARS' 4='11-20 YEARS' 
                  5='20 YRS OR MORE' 9='REFUSE' ;
  VALUE OC3f      1='2 YEARS' 2='3-5 YEARS' 3='6-10 YEARS' 4='11-20 YEARS' 
                  5='20 YRS OR MORE' 9='REFUSE' ;
  VALUE OC4f      1='OWN' 2='RENT' 9='REFUSE' ;
  VALUE OC5f      0='INAP' 1='UNDER $250' 2='$250 TO $500' 3='$501 TO $750' 
                  4='$751 TO $1,000' 5='$1000 OR MORE' 8='DK' 9='REFUSE' ;
  VALUE OC6f      0='INAP' 1='UNDER $250' 2='$250-$500' 3='$501-$750' 
                  4='$751-$1000' 5='$1001-$1500' 6='$1500 OR MORE' 8='DK' 
                  9='REFUSED' ;
  VALUE OC7f      1='YES' 2='NO' 8='DK' 9='REFUSE' ;
  VALUE OC8f      1='MORE' 2='COMFORTABLE' 3='NOT QUITE' 4='STRUGGLING' 
                  8='DK' 9='REFUSE' ;
  VALUE OC9f      1='VERY OFTEN' 2='FAIRLY OFTEN' 3='NOT TOO OFTEN' 4='NEVER' 
                  8='DK' 9='REFUSE' ;
  VALUE OC10f     1='UPPER CLASS' 2='UPPER MIDDLE' 3='MIDDLE CLASS' 
                  4='LOWER MIDDLE' 5='LOWER CLASS' 8='DK' 9='REFUSE' ;
  VALUE OC11f     1='BETTER OFF' 2='WORSE OFF' 3='SAME' 8='DK' 9='REFUSE' ;
  VALUE OC12f     1='BETTER OFF' 2='WORSE OFF' 3='SAME' 8='DK' 9='REFUSE' ;
  VALUE OC13f     1='GOOD TIMES' 2='BAD TIMES' 8='DK' 9='REFUSE' ;
  VALUE OC14f     1='GOOD TIMES' 2='DEPRESSION' 8='DK' 9='REFUSE' ;
  VALUE OC15f     1='GOOD TIMES' 2='BAD TIMES' 8='DK' 9='REFUSE' ;
  VALUE OC16f     1='YES' 2='NO' 8='DK' 9='REFUSE' ;
  VALUE OC17f     1='POP. GROWTH' 2='TRAFFIC CONGESTION' 3='HOUSING' 
                  4='CRIME' 5='CHILDREN ISSUES' 6='IMMIGRATION' 7='OTHER' 
                  8='DK' 9='REFUSE' ;
  VALUE OC18f     1='BETTER PLACE' 2='WORSE PLACE' 3='NO CHANGE' 8='DK' 
                  9='REFUSE' ;
  VALUE OC19f     1='RAPIDLY' 2='SLOWLY' 3='ABOUT THE SAME' 4='LOSING POP.' 
                  8='DK' 9='REFUSE' ;
  VALUE OC20f     1='SEVERE' 2='MODEST' 3='NO RESTRICT.' 8='DK' 9='REFUSE' ;
  VALUE OC21f     1='SEVERE' 2='MODEST' 3='NO RESTRICT.' 8='DK' 9='REFUSE' ;
  VALUE OC22f     1='SEVERE' 2='MODEST' 3='NO RESTRICT.' 8='DK' 9='REFUSE' ;
  VALUE OC23f     1='SEVERE' 2='MODEST' 3='NO RESTRICT.' 8='DK' 9='REFUSE' ;
  VALUE OC24f     1='YES' 2='NO' 8='DK' 9='REFUSE' ;
  VALUE OC25f     11='GROWTH RAPID' 12='GROWTH BAD' 13='GROWTH GOOD' 
                  14='NEED DEVELOPMNT' 15='NEED FOR GROWING POP' 
                  16='CREATES JOBS' 17='GOOD FOR ECONOMY' 
                  21='NEED MORE HOUSING' 22='TOO MANY PEOPLE' 
                  23='TOO MANY BUSINESSES' 24='TOO MANY APARTMENTS' 
                  25='TOO MANY HOUSES' 26='TOO MUCH TRAFFIC' 
                  27='TOO MUCH CONGESTION' 28='SCHOOLS TOO CROWDED' 
                  31='NEED MORE PLANNING' 32='NEED BETTER PLANNING' 
                  33='NEED MOD. PLANNING' 34='NO GOVT RESTRICTIONS' 
                  35='LET MARKET DETERMINE' 41='CREATES SOCIAL PROBS' 
                  42='ENVIRONMENTAL PROBS' 43='IMPROVE QUAL. OF LIF' 
                  44='HURT QUALITY OF LIFE' 51='DEPENDS/SOMETIMES' 
                  61='THINGS ARE FINE' 77='OTHER' 88='DK' 99='REFUSED' ;
  VALUE OC36f     1='SATISFACTORY' 2='MORE LANES ONLY' 3='NEW FREEWAYS' 
                  8='DK' 9='REFUSE' ;
  VALUE OC37f     1='HIGH PRIORITY' 2='MEDIUM PRIORTY' 3='LOW PRIORITY' 
                  8='DK' 9='REFUSE' ;
  VALUE OC38f     1='HIGH PRIORITY' 2='MEDIUM PRIORTY' 3='LOW PRIORITY' 
                  8='DK' 9='REFUSE' ;
  VALUE OC39f     1='HIGH PRIORITY' 2='MEDIUM PRIORTY' 3='LOW PRIORITY' 
                  8='DK' 9='REFUSE' ;
  VALUE OC40f     1='HIGH PRIORITY' 2='MEDIUM PRIORTY' 3='LOW PRIORITY' 
                  8='DK' 9='REFUSE' ;
  VALUE OC41f     1='GOOD IDEA' 2='BAD IDEA' 8='DK' 9='REFUSE' ;
  VALUE OC59f     1='NEWSPAPERS' 2='TELEVISION' 3='RADIO' 4='MAGAZINES' 
                  5='TALKING TO PEOPLE' 6='OTHER' 8='DK' 9='REFUSE' ;
  VALUE OC60f     1='NEWSPAPERS' 2='TELEVISION' 3='RADIO' 4='MAGAZINES' 
                  5='TALKING TO PEOPLE' 6='OTHER' 8='DK' 9='REFUSE' ;
  VALUE OC61f     1='EVERY DAY' 2='FEW TIMES A WEEK' 3='ONCE A WEEK' 
                  4='LT ONCE A WEEK' 5='NEVER' 8='DK' 9='REFUSE' ;
  VALUE OC62f     1='CITY OR COMM.' 2='OC' 3='CALIFORNIA' 4='NATION' 5='ALL' 
                  6='NONE' 8='DK' 9='REFUSE' ;
  VALUE OC63f     1='CITY OR COMM.' 2='OC' 3='CALIFORNIA' 4='NATION' 5='ALL' 
                  6='NONE' 8='DK' 9='REFUSE' ;
  VALUE OC64f     1='VERY IMPORTANT' 2='SOMEWHAT IMPORTANT' 3='NOT IMPORTANT' 
                  8='DK' 9='REFUSE' ;
  VALUE OC65f     1='VERY IMPORTANT' 2='SOMEWHAT IMPORTANT' 3='NOT IMPORTANT' 
                  8='DK' 9='REFUSE' ;
  VALUE OC66f     1='VERY IMPORTANT' 2='SOMEWHAT IMPORTANT' 3='NOT IMPORTANT' 
                  8='DK' 9='REFUSE' ;
  VALUE OC67f     1='VERY IMPORTANT' 2='SOMEWHAT IMPORTANT' 3='NOT IMPORTANT' 
                  8='DK' 9='REFUSE' ;
  VALUE OC68f     1='LEGAL' 2='ILLEGAL' 8='DK' 9='REFUSE' ;
  VALUE OC69f     1='ANY AGE' 2='UNDER 18' 3='FORBID THE DIST.' 8='DK' 
                  9='REFUSE' ;
  VALUE OC70f     1='SHOULD NOT' 2='SHOULD INTERFERE' 8='DK' 9='REFUSE' ;
  VALUE OC71f     1='FULL TIME' 2='PART TIME' 3='UNEMPLOYED' 4='STUDENT' 
                  5='RETIRED' 6='KEEPING HOUSE' 7='OTHER' 8='DK' 9='REFUSE' ;
  VALUE OC72f     0='INAP' 1='NO PROBLEM' 2='SLIGHT PRB.' 3='GREAT PRB.' 
                  8='DK' 9='REFUSE' ;
  VALUE OC73f     0='INAP' ;
  VALUE OC74f     1='18 TO 24' 2='25 TO 34' 3='35 TO 44' 4='45 TO 54' 
                  5='55 TO 64' 6='65 OR OLDER' 8='DK' 9='REFUSE' ;
  VALUE OC75f     1='SOME H.S.' 2='H.S. GRADUATE' 3='SOME COLLEGE' 
                  4='COLLEGE GRADUATE' 5='POST-GRADATE DEGREE' 8='DK' 
                  9='REFUSE' ;
  VALUE OC76f     1='MARRIED' 2='DIVORCED' 3='WIDOWED' 4='SINGLE' 8='DK' 
                  9='REFUSE' ;
  VALUE OC77f     0='NONE' 1='ONE PERSON' 2='TWO PERSONS' 3='THREE PERSONS' 
                  4='FOUR PERSONS' 5='FIVE PERSONS' 6='SIX PERSONS' 
                  7='SEVEN PERSONS' 8='EIGHT OR MORE' 9='REFUSE' ;
  VALUE OC78f     0='NONE' 1='ONE PERSON' 2='TWO PERSONS' 3='THREE PERSONS' 
                  4='FOUR PERSONS' 5='FIVE PERSONS' 6='SIX PERSONS' 
                  7='SEVEN PERSONS' 8='EIGHT OR MORE' 9='REFUSE' ;
  VALUE OC79f     0='NONE' 1='ONE PERSON' 2='TWO PERSONS' 3='THREE PERSONS' 
                  4='FOUR PERSONS' 5='FIVE PERSONS' 6='SIX PERSONS' 
                  7='SEVEN PERSONS' 8='EIGHT OR MORE' 9='REFUSE' ;
  VALUE OC80f     0='NONE' 1='ONE PERSON' 2='TWO PERSONS' 3='THREE PERSONS' 
                  4='FOUR PERSONS' 5='FIVE PERSONS' 6='SIX PERSONS' 
                  7='SEVEN PERSONS' 8='EIGHT OR MORE' 9='REFUSE' ;
  VALUE OC82f     1='UNDER $25,000' 2='$25,000 TO $35,000' 
                  3='$36,000 TO $50,000' 4='$51,000 TO $65,000' 
                  5='$66,000 TO $80,000' 6='OVER 80,000' 8='DK' 9='REFUSE' ;
  VALUE OC83f     1='DEMOCRAT' 2='REPUBLICAN' 3='INDEPENDENT' 4='OTHER PARTY' 
                  5='NOT REGISTERED' 8='DK' 9='REFUSE' ;
  VALUE OC84f     0='INAP' 1='DEUKMEJIAN (R)' 2='BRADLEY (D)' 8='DK' 
                  9='REFUSE' ;
  VALUE OC85f     0='INAP' 1='CRANSTON (D)' 2='ZSCHAU (R)' 8='DK' 9='REFUSE' ;
  VALUE OC86f     0='INAP' 1='REMAIN ON COURT' 2='BE REMOVED' 8='DK' 
                  9='REFUSE' ;
  VALUE OC87f     0='INAP' 1='LIBERAL' 2='MIDDLE' 3='CONSERVATIVE' 8='DK' 
                  9='REFUSE' ;
  VALUE OC88f     1='ASIAN' 2='BLACK' 3='WHITE' 4='OTHER' 8='DK' 9='REFUSE' ;
  VALUE OC89f     1='YES' 2='NO' 8='DK' 9='REFUSE' ;
  VALUE OC90f     1='MALE' 2='FEMALE' ;
  VALUE REGION    1.00='WEST' 2.00='NORTH' 3.00='CENTRAL' 4.00='SOUTH' ;
  VALUE CITIES    1.00='BUENA PARK' 2.00='LA PALMA' 3.00='CYPRESS' 
                  4.00='LA HABRA' 5.00='STANTON' 6.00='LOS ALAMITOS' 
                  7.00='SEAL BEACH' 8.00='SUNSET BEACH' 9.00='SURFSIDE' 
                  10.00='ATWOOD' 11.00='BREA' 12.00='CAPISTRANO BEACH' 
                  13.00='CORONA DEL MAR' 14.00='COSTA MESA' 
                  15.00='DANA POINT' 16.00='EL TORO' 17.00='FULLERTON' 
                  18.00='GARDEN GROVE' 19.00='HUNTINGTON BEACH' 
                  20.00='EAST IRVINE' 21.00='LAGUNA BEACH' 
                  22.00='LAGUNA HILLS' 23.00='MIDWAY CITY' 
                  24.00='NEWPORT BEACH' 25.00='ORANGE' 26.00='PLACENTIA' 
                  27.00='SAN CLEMENTE' 28.00='SAN JUAN CAPISTRANO' 
                  29.00='SILVERADO' 30.00='SOUTH LAGUNA' 
                  31.00='TRABUCO CANYON' 32.00='TUSTIN' 33.00='WESTMINSTER' 
                  34.00='YORBA LINDA' 35.00='TRABUCO OAKS/SAN JUA' 
                  36.00='MISSION VIEJO' 37.00='SANTA ANA' 
                  38.00='FOUNTAIN VALLEY' 39.00='IRVINE' 40.00='ANAHEIM' ;
  VALUE YEAR      1986='YEAR OF SURVEY' ;
RUN;

DATA IN (LABEL="ORANGE COUNTY ANNUAL SURVEY");
  INFILE INDATA LRECL=112;
  INPUT
    #1  CASEID 1-4              OC1 5                   OC2 6                   
        OC3 7                   OC4 8                   OC5 9                   
        OC6 10                  OC7 11                  OC8 12                  
        OC9 13                  OC10 14                 OC11 15                 
        OC12 16                 OC13 17                 OC14 18                 
        OC15 19                 OC16 20                 OC17 21                 
        OC18 22                 OC19 23                 OC20 24                 
        OC21 25                 OC22 26                 OC23 27                 
        OC24 28                 OC25 29-30              OC36 31                 
        OC37 32                 OC38 33                 OC39 34                 
        OC40 35                 OC41 36                 OC59 37                 
        OC60 38                 OC61 39                 OC62 40                 
        OC63 41                 OC64 42                 OC65 43                 
        OC66 44                 OC67 45                 OC68 46                 
        OC69 47                 OC70 48                 OC71 49                 
        OC72 50                 OC73 51-55              OC74 56                 
        OC75 57                 OC76 58                 OC77 59                 
        OC78 60                 OC79 61                 OC80 62                 
        OC81 63-67              OC82 68                 OC83 69                 
        OC84 70                 OC85 71                 OC86 72                 
        OC87 73                 OC88 74                 OC89 75                 
        OC90 76                 REGION 77-84 .2         CITIES 85-92 .2         
        OUTS 93-100 .2          WT 101-108 .2           YEAR 109-112            
        ;

  LABEL
   CASEID  = 'CASE ID'
   OC1     = 'CURRENT RESIDENCE'
   OC2     = 'YEARS IN ORANGE COUNTY'
   OC3     = 'YEARS AT CURRENT RESIDENCE'
   OC4     = 'OWN OR RENT CURRENT RESIDENCE'
   OC5     = 'CURRENT MONTHLY RENTAL PAYMENT'
   OC6     = 'CURRENT MONTHLY MORTGAGE PAYMENT'
   OC7     = 'IN THE MARKET TO BUY A HOME CURRENTLY?'
   OC8     = 'CURRENT STANDARD OF LIVING'
   OC9     = 'HOW OFTEN WORRY ABOUT MONEY'
   OC10    = 'SOCIAL CLASS CATEGORIES'
   OC11    = 'BETTER OFF FINANCIALLY THAN YEAR AGO'
   OC12    = 'BETTER OFF A YEAR FROM NOW'
   OC13    = 'GOOD TIMES FINANCIALLY DURING NEXT YEAR'
   OC14    = 'GOOD TIMES NEXT FIVE YEARS'
   OC15    = 'GOOD TIME FOR BUYING HOUSEHOLD ITEMS'
   OC16    = 'DONATED $50 OR MORE TO HELP THE POOR'
   OC17    = 'MOST SERIOUS PROBLEM IN ORANGE COUNTY'
   OC18    = 'FUTURE IN ORANGE COUNTY ...'
   OC19    = 'PAST THREE YEARS: POP IN YOUR CITY...'
   OC20    = 'BUILDING SINGLE FAMILY HOMES'
   OC21    = 'BUILDING SHOPS STORES AND RESTAURANTS'
   OC22    = 'BUILDING APARTMENTS'
   OC23    = 'BUILDING OFFICES AND INDUSTRIAL PARKS'
   OC24    = 'SLOW DOWN PACE OF DEVELOPMENT IN CITY'
   OC25    = 'WHY IS THAT?'
   OC36    = 'FEEL ABOUT FREEWAYS IN ORANGE COUNTY?'
   OC37    = 'ADDING CARPOOL LANES ON FREEWAYS'
   OC38    = 'BUILDING NEW FREEWAYS'
   OC39    = 'ADDING TRAFFIC LANES ON FREEWAYS'
   OC40    = 'IMPROVING LOCAL STREETS'
   OC41    = 'HIGHWAY 55 CARPOOL LANE GOOD IDEA?'
   OC59    = 'INFO. ABOUT WHATS GOING ON IN THE WORLD?'
   OC60    = 'INFO. ABOUT WHATS GOING ON IN OC TODAY?'
   OC61    = 'HOW OFTEN READ NEWSPAPER?'
   OC62    = 'NEWS STORIES INTERESTS YOU THE MOST?'
   OC63    = 'NEWS STORIES INTERESTS YOU THE LEAST?'
   OC64    = 'INFORMED ABOUT NEWS AND PUBLIC ISSUES'
   OC65    = 'VOLUNTEER TIME TO COMMUNITY SERVICES'
   OC66    = 'GIVING MONEY TO HELP POOR'
   OC67    = 'GIVING MONEY TO ARTS AND CULTURE'
   OC68    = 'HOMOSEXUAL REL BETWEEN CONSENTING ADULTS'
   OC69    = 'FEELINGS ABOUT PORNOGRAPHY LAWS'
   OC70    = 'GOVT INTERFERE PRIV MATTERS OF CITIZENS?'
   OC71    = 'CURRENT WORK STATUS?'
   OC72    = 'PROB. TRAFFIC CONGES WHEN YOU TRAVEL'
   OC73    = 'ZIP CODE OF CURRENT WORKPLACE?'
   OC74    = 'WHAT IS YOUR AGE?'
   OC75    = 'LAST GRADE OF SCHOOL COMPLETED?'
   OC76    = 'CURRENT MARITAL STATUS?'
   OC77    = 'NUMBER OF PERSONS IN HOUSEHOLD'
   OC78    = 'ADULT FULL TIME WORKERS IN HOUSEHOLD?'
   OC79    = 'CHILDREN AGES 5 AND UNDER IN HOUSEHOLD?'
   OC80    = 'CHILDREN AGES 6 TO 17 IN HOUSEHOLD?'
   OC81    = 'ZIP CODE OF CURRENT RESIDENCE?'
   OC82    = 'TOTAL HOUSEHOLD INCOME?'
   OC83    = 'REGISTERED DEMOCRAT OR REPUBLICAN?'
   OC84    = 'VOTE FOR GOVERNOR TODAY'
   OC85    = 'VOTE FOR U.S. SENATOR'
   OC86    = 'VOTE FOR ROSE BIRD'
   OC87    = 'CONSIDER YOURSELF TO BE POLITICALLY:'
   OC88    = 'HOW WOULD YOUR DESCRIBE YOUR RACE:'
   OC89    = 'CONTACTED FOR FOLLOW-UP AT LATER DATE'
   OC90    = 'SEX:'
   REGION  = 'ORANGE COUNTY GEOGRAPHIC REGIONS'
   CITIES  = 'RESPONDENT CITY CLASSIFIED BY ZIPCODE'
   OUTS    = 'OUTS'
   WT      = 'WT'
   YEAR    = 'YEAR OF SURVEY'  ;
  FORMAT OC1 OC1f. OC2 OC2f. OC3 OC3f. 
         OC4 OC4f. OC5 OC5f. OC6 OC6f. 
         OC7 OC7f. OC8 OC8f. OC9 OC9f. 
         OC10 OC10f. OC11 OC11f. OC12 OC12f. 
         OC13 OC13f. OC14 OC14f. OC15 OC15f. 
         OC16 OC16f. OC17 OC17f. OC18 OC18f. 
         OC19 OC19f. OC20 OC20f. OC21 OC21f. 
         OC22 OC22f. OC23 OC23f. OC24 OC24f. 
         OC25 OC25f. OC36 OC36f. OC37 OC37f. 
         OC38 OC38f. OC39 OC39f. OC40 OC40f. 
         OC41 OC41f. OC59 OC59f. OC60 OC60f. 
         OC61 OC61f. OC62 OC62f. OC63 OC63f. 
         OC64 OC64f. OC65 OC65f. OC66 OC66f. 
         OC67 OC67f. OC68 OC68f. OC69 OC69f. 
         OC70 OC70f. OC71 OC71f. OC72 OC72f. 
         OC73 OC73f. OC74 OC74f. OC75 OC75f. 
         OC76 OC76f. OC77 OC77f. OC78 OC78f. 
         OC79 OC79f. OC80 OC80f. OC82 OC82f. 
         OC83 OC83f. OC84 OC84f. OC85 OC85f. 
         OC86 OC86f. OC87 OC87f. OC88 OC88f. 
         OC89 OC89f. OC90 OC90f. REGION REGION. 
         CITIES CITIES. YEAR YEAR.  ;

/* md, min and max specifications were translated  */
/* into the following "IF" statements:           */

IF (OC1 = 9) THEN OC1 = .;
IF (OC2 = 9) THEN OC2 = .;
IF (OC3 = 9) THEN OC3 = .;
IF (OC4 = 9) THEN OC4 = .;
IF (OC5 = 0) THEN OC5 = .;
IF (OC6 = 0) THEN OC6 = .;
IF (OC7 = 8) THEN OC7 = .;
IF (OC8 = 8) THEN OC8 = .;
IF (OC9 = 8) THEN OC9 = .;
IF (OC10 = 8) THEN OC10 = .;
IF (OC11 = 8) THEN OC11 = .;
IF (OC12 = 8) THEN OC12 = .;
IF (OC13 = 8) THEN OC13 = .;
IF (OC14 = 8) THEN OC14 = .;
IF (OC15 = 8) THEN OC15 = .;
IF (OC16 = 8) THEN OC16 = .;
IF (OC17 = 8) THEN OC17 = .;
IF (OC18 = 8) THEN OC18 = .;
IF (OC19 = 8) THEN OC19 = .;
IF (OC20 = 8) THEN OC20 = .;
IF (OC21 = 8) THEN OC21 = .;
IF (OC22 = 8) THEN OC22 = .;
IF (OC23 = 8) THEN OC23 = .;
IF (OC24 = 8) THEN OC24 = .;
IF (OC25 = 88) THEN OC25 = .;
IF (OC36 = 8) THEN OC36 = .;
IF (OC37 = 8) THEN OC37 = .;
IF (OC38 = 8) THEN OC38 = .;
IF (OC39 = 8) THEN OC39 = .;
IF (OC40 = 8) THEN OC40 = .;
IF (OC41 = 8) THEN OC41 = .;
IF (OC59 = 8) THEN OC59 = .;
IF (OC60 = 8) THEN OC60 = .;
IF (OC61 = 8) THEN OC61 = .;
IF (OC62 = 8) THEN OC62 = .;
IF (OC63 = 8) THEN OC63 = .;
IF (OC64 = 8) THEN OC64 = .;
IF (OC65 = 8) THEN OC65 = .;
IF (OC66 = 8) THEN OC66 = .;
IF (OC67 = 8) THEN OC67 = .;
IF (OC68 = 8) THEN OC68 = .;
IF (OC69 = 8) THEN OC69 = .;
IF (OC70 = 8) THEN OC70 = .;
IF (OC71 = 8) THEN OC71 = .;
IF (OC72 = 0) THEN OC72 = .;
IF (OC73 = 99,999) THEN OC73 = .;
IF (OC74 = 8) THEN OC74 = .;
IF (OC75 = 8) THEN OC75 = .;
IF (OC76 = 8) THEN OC76 = .;
IF (OC77 = 9) THEN OC77 = .;
IF (OC78 = 9) THEN OC78 = .;
IF (OC79 = 9) THEN OC79 = .;
IF (OC80 = 9) THEN OC80 = .;
IF (OC81 = 99,999) THEN OC81 = .;
IF (OC82 = 8) THEN OC82 = .;
IF (OC83 = 8) THEN OC83 = .;
IF (OC84 = 0) THEN OC84 = .;
IF (OC85 = 0) THEN OC85 = .;
IF (OC86 = 0) THEN OC86 = .;
IF (OC87 = 0) THEN OC87 = .;
IF (OC88 = 8) THEN OC88 = .;

PROC DATASETS;
  CONTENTS DATA=IN POSITION;
  TITLE 'CONTENTS OF ALL VARIABLES';
RUN;
